home *** CD-ROM | disk | FTP | other *** search
/ Just Call Me Internet / Just Call Me Internet.iso / prog / atari / m2 / cat3src / putz / putzacti.d < prev    next >
Text File  |  1997-10-26  |  1KB  |  44 lines
  1. DEFINITION MODULE PutzAction;
  2.  
  3. FROM SYSTEM IMPORT ADDRESS;
  4.  
  5. (* In diesem Modul laufen die Ausgaben des Putzes zusammen
  6.  * Es wird ein Dialog in einem Fenster dargestellt, und
  7.  * die Ausgaben werden ber die Rechteckliste mit den 
  8.  * get&set-Modus von wind_update gemacht
  9.  *)
  10.  
  11. PROCEDURE InitActionBox ();
  12. (* Initialisiert die Box, bringt das Fenster auf den Bildschirm
  13.  *)
  14.  
  15. PROCEDURE ReInitActionBox (REF grName : ARRAY OF CHAR; msgCount : LONGCARD);
  16. (* Init der Action-Box: Es werden alle notwendigen festen Strings berechnet,
  17.  * die variablen Strings werden gel”scht und die Box wird gezeichnet.
  18.  * Der Prozentbalken wird auf 0% gesetzt und auch gezeichnet
  19.  *)
  20.  
  21. PROCEDURE BeginNextPass (mode: INTEGER);
  22. (* Reinitialisiert die Box nochmals, stellt Z„hler wieder auf 0, 
  23.  * und zeigt n„chsten Modus an.
  24.  *)
  25.  
  26. PROCEDURE ShowBuffStatus (tabBuff, parBuff, datBuff : BOOLEAN);
  27. (* Zeigt den Pufferungsstatus in der Box an
  28.  *)
  29.  
  30. PROCEDURE ReleaseActionBox();
  31. (* Gibt die Boxu nd das Fenster wieder frei
  32.  *)
  33.  
  34. PROCEDURE TellAction (actMode : INTEGER; msgCount : LONGCARD): BOOLEAN;
  35. (* Hauptprozedur, zeigt neuen Stand im Fenster an
  36.  *)
  37.  
  38. PROCEDURE InitModule (tree: ADDRESS);
  39. (* Muž am Anfang aufgerufen werden, damit das Modul die Adresse 
  40.  * des Baumes hat
  41.  *)
  42.  
  43. END PutzAction.
  44.